﻿Public Class PedidoDetalle

    Dim _CIA, _SUC, _TDOC, _DCI As String
    Dim _DCDCOD, _DCDFEC, _ARTCOD, _ALMCOD As String
    Dim _DCDORD, _DCDATEN As Integer
    Dim _DCDDESC, _DCDVALU As Decimal
    Dim _DCDULTMOD As String
    Dim _VALUNITSOL, _VALUNITDOL As Decimal
    Dim _DCDDESCCOND, _DCDPORPER As Decimal
    Dim _FECLLE, _DCDACT, _DCDDESCADI As String
    Dim _SUBTOT, _MONPER As Decimal

    Sub New()

    End Sub

    Sub New(cia As String, suc As String, tdoc As String, dci As String, dcd As String,
            articulo As String, almacen As String, ordenado As Integer, atendido As Integer, descuento As Decimal,
            dcdDesAdi As String, valorUniSoles As Decimal,
            valorUnitDolares As Decimal, dcdDesCondicional As Decimal, dcdPorPer As Decimal,
            fecLlegada As String, subtotal As Decimal, monper As Decimal, activo As String)
        Me._CIA = cia
        Me._SUC = suc
        Me._TDOC = tdoc
        Me._DCI = dci
        Me._DCDCOD = dcd
        Me._ARTCOD = articulo
        Me._ALMCOD = almacen
        Me._DCDORD = ordenado
        Me._DCDATEN = atendido
        Me._DCDDESC = descuento
        Me._DCDDESCADI = dcdDesAdi
        Me._VALUNITSOL = valorUniSoles
        Me._VALUNITDOL = valorUnitDolares
        Me._DCDDESCCOND = dcdDesCondicional
        Me._DCDPORPER = dcdPorPer
        Me._FECLLE = fecLlegada
        Me._SUBTOT = subtotal
        Me._MONPER = monper
        Me._DCDACT = activo
    End Sub

    Public Property CIA() As String
        Get
            Return _CIA
        End Get
        Set(value As String)
            _CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _SUC
        End Get
        Set(value As String)
            _SUC = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _TDOC
        End Get
        Set(value As String)
            _TDOC = value
        End Set
    End Property

    Public Property DCI_Codigo() As String
        Get
            Return _DCI
        End Get
        Set(value As String)
            _DCI = value
        End Set
    End Property

    Public Property DCD_Codigo() As String
        Get
            Return _DCDCOD
        End Get
        Set(value As String)
            _DCDCOD = value
        End Set
    End Property

    Public Property DCD_Fecha() As String
        Get
            Return _DCDFEC
        End Get
        Set(value As String)
            _DCDFEC = value
        End Set
    End Property

    Public Property ART_Codigo() As String
        Get
            Return _ARTCOD
        End Get
        Set(value As String)
            _ARTCOD = value
        End Set
    End Property

    Public Property ALM_Codigo() As String
        Get
            Return _ALMCOD
        End Get
        Set(value As String)
            _ALMCOD = value
        End Set
    End Property

    Public Property DCD_Ordenado() As Integer
        Get
            Return _DCDORD
        End Get
        Set(value As Integer)
            _DCDORD = value
        End Set
    End Property

    Public Property DCD_Atendido() As Integer
        Get
            Return _DCDATEN
        End Get
        Set(value As Integer)
            _DCDATEN = value
        End Set
    End Property

    Public Property DCD_Descuento() As Decimal
        Get
            Return _DCDDESC
        End Get
        Set(value As Decimal)
            _DCDDESC = value
        End Set
    End Property

    Public Property DCD_ValorUnitario() As Decimal
        Get
            Return _DCDVALU
        End Get
        Set(value As Decimal)
            _DCDVALU = value
        End Set
    End Property

    Public Property DCD_UltModificacion() As String
        Get
            Return _DCDULTMOD
        End Get
        Set(value As String)
            _DCDULTMOD = value
        End Set
    End Property

    Public Property DCD_DescuentoAdicional() As String
        Get
            Return _DCDDESCADI
        End Get
        Set(value As String)
            _DCDDESCADI = value
        End Set
    End Property

    Public Property DCD_ValorUnitSoles() As Decimal
        Get
            Return _VALUNITSOL
        End Get
        Set(value As Decimal)
            _VALUNITSOL = value
        End Set
    End Property

    Public Property DCD_ValorUnitDolares() As Decimal
        Get
            Return _VALUNITDOL
        End Get
        Set(value As Decimal)
            _VALUNITDOL = value
        End Set
    End Property

    Public Property DCD_DescuentoCondicional() As Decimal
        Get
            Return _DCDDESCCOND
        End Get
        Set(value As Decimal)
            _DCDDESCCOND = value
        End Set
    End Property

    Public Property DCD_PorcentaePercepcion() As Decimal
        Get
            Return _DCDPORPER
        End Get
        Set(value As Decimal)
            _DCDPORPER = value
        End Set
    End Property

    Public Property DCD_FechaLlegada() As String
        Get
            Return _FECLLE
        End Get
        Set(value As String)

        End Set
    End Property

    Public Property DCD_Activo() As String
        Get
            Return _DCDACT
        End Get
        Set(value As String)

        End Set
    End Property

    Public Property DCD_Subtotal() As Decimal
        Get
            Return _SUBTOT
        End Get
        Set(value As Decimal)
            _SUBTOT = value
        End Set
    End Property

    Public Property DCD_MontoPercepcion() As Decimal
        Get
            Return _MONPER
        End Get
        Set(value As Decimal)
            _MONPER = value
        End Set
    End Property

End Class
